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<SCRIPT LANGUAGE=" JavaScript "> 

// Define the variable (s) holding the Model data 
var counter - 0; //a counter value 

// Define the variables holding pointers to the View components 
var theFrame; // pointer to the LFrame component 

var theForm; // pointer to the LForm component 

var theText; // pointer to the LText component 

var theButton; // pointer to the LButton component 

var theStaticText; // pointer to the LStaticText component 

function initialize () // Create and initialize components 
{ 

// Create a library LFrame component 

theFrame = new parent .LIBFrame.LFrcune ("Framel" , "A Frame"); 

CI 

i^l // Adjust the base font to be +3 larger 

ES5 theFrame, adjustBaseFont (+3) ; 

D // Create a library LForm component inside the LFrame 

El theForm = new parent .LIBFrame. LForm {"Forml", theFrame); 

"^l 11 Create a library LText (text entry field) component inside the LForm 

Y theText = new parent.LIBFrame.LText ("foo", "bar", theForm); 



Cil 



// Set up an event handler to handle user changes to the LText 
theText . setOnChange (T_onChange) ; 



// Create a library LButton component inside the LForm 
Ll theButton = new parent.LIBFrame. LButton ("increment_but ton " , 

Igj "increment Counter", theForm); 

5; // Set an event handler to handle clicks on the LButton 

theButton . setOnClick (B_increment) ; 
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// Create a library LStaticText (label) component in the LForm 
theStaticText = new parent. LIBFrame. LStaticText ("OST", "piece of text 

theFonn) ; • • • / 

// Set the font size for the LStaticText 
theStaticText. setFontSize (1) ; 

// Set the color for the LStaticText 
theStaticText. setColor ("red") ; 

// Refresh the contents of the User Interaction window 
theFrame.Ref reshVisibleFrame (); 

// Set the browser focus to be on the LText component 
theText.focus 0 ; 

} 



// This function is invoked on the LText component when the value is 
// by a user interaction 



fiinction T_onChange () 



//Change the value to a message 

this.setValue ("Please do not change the valuel"); 




// This function is invoked on the LText object when the user clicks on it 





function T_onClick () 
{ 

this.setValue ("Please do not click on thisl"); 



// This function is invoked on the LButton object when the user clicks 



// Increment the counter (Model) 
counter += 1; 

// Move the new counter value into the LText field 
theText . setValue (counter) ; 

// Increment the font size on the LStaticText component 
theStaticText.setFontSize (theStaticText .getFontSize () + 1) ; 

// Toggle the LStaticText component font between Courier and 
if (0 == (counter % 2) ) 

theStaticText. setFace ("Courier") ; 
else 

theStaticText. setFace ("Impact") ; 



function B_increment () 
{ 



</SCRIPT> 




